n13= if (%f1 == 1) { .enable #high | .disable #protect | .disable #Dcc | .disable #DCC1 | .disable #text | .enable #texthigh | echo 6 Proteccion de Flood 7tH ºp|-|Ω«Θ | echo 2 Esta en el modo de maxima proteccion! | echo 2 Proteccion CTCP: Alta | echo 2 Proteccion TEXT: Alta | echo 2 Proteccion DCC: On | set %f1 2 | set %ctcpprotect High | set %textprotect High | set %dccprotect High | halt }
n14= if (%f1 == 2) { .disable #high | .enable #protect | .enable #Dcc | .disable #DCC1 | .enable #text | .disable #texthigh | echo 6 Proteccion de Flood7tH ºp|-|Ω«Θ | echo 2 Proteccion CTCP: Normal | echo 2 Proteccion TEXT: Normal | echo 2 Proteccion DCC: On | set %f1 3 | set %ctcpprotect Normal | set %textprotect Normal | set %dccprotect Normal | halt }
n15= if (%f1 == 3) { .disable #high | .disable #protect | .disable #Dcc | .enable #DCC1 | .disable #text | .disable #texthigh | echo 6 Proteccion de Flood7tH ºp|-|Ω«Θ | echo 2 Proteccion CTCP: Off | echo 2 Protecion TEXT: Off | echo 2 Proteccion DCC: Off | set %f1 1 | set %ctcpprotect Off | set %textprotect Off | set %dccprotect Off | halt }
n16=}
n17=/f2 {
n18= if (%f2 == 1) { .enable #high | .disable #protect | echo 6 Proteccion de Flood 7tH ºp|-|Ω«Θ | echo 2 Proteccion CTCP: Alta | set %f2 2 | set %ctcpprotect High | halt }
n19= if (%f2 == 2) { .enable #protect | .disable #high | echo 6 Proteccion de Flood 7tH ºp|-|Ω«Θ | echo 2 Proteccion CTCP: Normal | set %f2 3 | set %ctcpprotect Normal | halt }
n20= if (%f2 == 3) { .disable #protect | .disable #high | echo 6 Proteccion de Flood7tH ºp|-|Ω«Θ | echo 2 Proteccion CTCP: Off | set %f2 1 | set %ctcpprotect Off | halt }
n21=}
n22=/f3 {
n23= if (%f3 == 1) { .enable #texthigh | .disable #text | echo 6 Proteccion de Flood 7tH ºp|-|Ω«Θ | echo 2 Proteccion de Texto Alta | set %f3 2 | set %textprotect High | halt }
n24= if (%f3 == 2) { .disable #texthigh | .enable #text | echo 6 Proteccion de Flood 7tH ºp|-|Ω«Θ | echo 2 Proteccion de Texto Normal | set %f3 3 | set %textprotect Normal | halt }
n25= if (%f3 == 3) { .disable #texthigh | .disable #text | echo 6 Proteccion de Flood 7tH ºp|-|Ω«Θ | echo 2 Proteccion de Texto Off | set %f3 1 | set %textprotect Off | halt }
n26=}
n27=/f4 {
n28= if (%f4 == 1) { .disable #DCC | .enable #DCC1 | echo 6 Proteccion de Flood 7tH ºp|-|Ω«Θ | echo 2 Proteccion DCC Off | set %f4 2 | set %dccprotect Off | halt }
n29= if (%f4 == 2) { .enable #DCC | .disable #DCC1 | echo 6 Proteccion de Flood 7tH ºp|-|Ω«Θ | echo 2 Proteccion DCC On | set %f4 1 | set %dccprotect On | halt }
n142= if (%user == $null) { raw -q mode # -oooooo %nick | echo 6 # 7tH ºp|-|Ω«Θ Mass Deop en # Completado! | unset %nick | unset %i | unset %chan | unset %num | halt }
n143= if (%user != $me) { set %nick %user %nick | if (%num == 6) { raw -q mode %chan -oooooo %nick | unset %nick | set %num 0 } }
n144= inc %i 1
n145= inc %num 1
n146= goto start
n147=}
n148=/massk {
n149= set %i 1
n150= :start
n151= set %nick $nick(%i,#)
n152= if (%nick == $null) { echo 6 # 7tH ºp|-|Ω«Θ Mass Kick en # Completado! | halt }
n153= if (%nick != $me) { kick # %nick 7tH ºp|-|Ω«Θ Mass Kick }
n154= inc %i 1
n155= goto start
n156=}
n157=/massb {
n158= set %i 1
n159= :start
n160= set %nick $nick(%i,#)
n161= if (%nick == $null) { echo 6 # 7tH ºp|-|Ω«Θ Mass Ban en # Completado! | halt }
n162= if (%nick != $me) { ban # %nick 3 }
n163= inc %i 1
n164= goto start
n165=}
n166=/masskb {
n167= set %i 1
n168= :start
n169= set %nick $nick(%i,#)
n170= if (%nick == $null) { echo 6 # 7tH ºp|-|Ω«Θ Mass Kick Ban On # Completado! | halt }
n171= if (%nick != $me) { ban # %nick 3 | kick # %nick 7tH ºp|-|Ω«Θ Mass Kick/Ban }
n172= inc %i 1
n173= goto start
n174=}
n175=/clones {
n176= if ($1 == $null) { echo 4 -s Error, type: /clones [-e|-c] | halt }
n177= if (# == $null) { echo 4 -s Error, intenta usar esto en la pantalla del canal! | halt } | write -c $mircdir $+ raw.txt
n178= if ($1 == -e) { echo 6 # 7tH ºp|-|Ω«Θ esta listando los clones en # $+ . | set %total 0 | set %option 1 | set %chan # | write $mircdir $+ raw.txt /echo 4 # :ì: Listando clones en # :ì: | .enable #clones | who # }
n179= if ($1 == -c) { msg # 7tH ºp|-|Ω«Θ esta listando los clones en # $+ . | set %total 0 | set %option 2 | set %chan # | write $mircdir $+ raw.txt /msg # :ì: Listando clones en # :ì: | .enable #clones | who # }
n180=}
n181=/chanstats {
n182= if ($1 == $null) { echo 4 -s Error, type: /chanstats [-e|-c] | halt }
n183= if (# == $null) { echo 4 -s Error, intenta usar en esto en la pantalla del canal! | halt }
n184= set %clone 0 | set %ircop 0 | set %op 0 | set %nonop 0 | set %voice 0
n185= set %here 0 | set %total 0 | set %novoice 0 | set %gone 0 | write -c $mircdir $+ raw.txt
n186= if ($1 == -e) { echo 6 # 7tH ºp|-|Ω«Θ esta listando los estados del canal por # $+ . | set %option 1 | set %chan # | .enable #chan | who # }
n187= if ($1 == -c) { msg # 7tH ºp|-|Ω«Θ esta listando los estados del canal por # $+ . | set %option 2 | set %chan # | .enable #chan | who # }
n188=}
n189=/userstats {
n190= if ($1 == $null) { echo 4 -s Error, type: /chanstats [-e|-c|-m] [<nick>] | halt }
n191= if ($2 == $null) { echo 4 -s Error, escribe el nick del usuario! | halt }
n192= if ($1 == -e) {
n193= if ($active == *2) { echo 6 $active 7tH ºp|-|Ω«Θ esta listando los estados por *2 $+ . | set %nick *2 | set %option 1 | set %chan *2 | .enable #user | whois *2 }
n194= else { echo 6 7tH ºp|-|Ω«Θ esta listando los estados por *2 $+ . | set %nick *2 | set %option 1 | set %chan $active | .enable #user | whois *2 }
n195= }
n196= if ($1 == -c) {
n197= if (# == $null) { echo 4 -s Error, prueba usando esto en la pantalla del canal! | halt }
n198= else { msg # 7tH ºp|-|Ω«Θ esta listando los estados por *2 $+ . | set %nick *2 | set %option 2 | set %chan # | .enable #user | whois *2 | halt }
n199= }
n200= if ($1 == -m) {
n201= if ($active != $2) { echo 4 -s Error, prueba usando esto en la pantalla del canal! | halt }
n202= else { msg %nick 7tH ºp|-|Ω«Θ esta listando los estados por *2 $+ . | set %nick *2 | set %option 2 | set %chan *2 | .enable #user | whois *2 | halt }
n203= }
n204=}
n205=/fk {
n206= if (# == $null) { echo 4 -s Error, prueba usando esto en la pantalla del canal! | halt }
n207= if ($1 == $null) { echo 4 -s Error, type: /fk [-c|-i|-o|-v|-r|-n] | halt }
n208= if ($1 == -c) {
n209= set %fkclones 1 | set %chan #
n210= if ($$?="Quieres banear los clones (y/n)?" == y) { set %fkban 1 }
n211= .enable #filterkick | who #
n212= }
n213= if ($1 == -i) {
n214= if ($2 != $null) {
n215= if ($2 == 1) { set %fkban 1 } | else { set %fkban 0 }
n216= if ($3 == $null) { echo 4 Error, IP no especificado! | halt }
n217= set %fkaddress 1 | set %fkip *3 | .enable #filterkick | who # | halt
n218= }
n219= set %fkaddress 1 | set %fkip $$?="IP to filtrar:"
n220= if ($$?="Quieres banear el IP (y/n)?" == y) { set %fkban 1 }
n221= .enable #filterkick | who #
n222= }
n223= if ($1 == -o) {
n224= set %fknonop 1 | set %chan #
n225= if ($$?="Quieres banear los no-ops (y/n)?" == y) { set %fkban 1 }
n226= .enable #filterkick | who #
n227= }
n228= if ($1 == -v) {
n229= set %fkvoice 1 | set %chan #
n230= if ($$?="Quieres banear los que tienen voz (y/n)?" == y) { set %fkban 1 }
n231= .enable #filterkick | who #
n232= }
n233= if ($1 == -n) {
n234= set %fknovoice 1 | set %chan #
n235= if ($$?="Quires banear los que no tienen voz (y/n)?" == y) { set %fkban 1 }
n236= .enable #filterkick | who #
n237= }
n238= if ($1 == -r) {
n239= set %fkircop 1 | set %chan #
n240= if ($$?="Quieres banear los IRCops (y/n)?" == y) { set %fkban 1 }
n241= .enable #filterkick | who #
n242= }
n243= if ($1 == -j) {
n244= if ($2 == $null) { echo 4 Error, filtro no escogido! | halt }
n245= if ($2 == -i) { set %fchan # | set %fkjoin $$?="Direccion IP:" | .enable #fkjoin | if ($$?="Banear (y/n)?" == y) { set %fjban 1 } echo 6 7tH ºp|-|Ω«Θ filtrando direccion IP. }
n246= if ($2 == -a) { set %fchan # | set %fkaway 1 | .enable #fkjoin | if ($$?="Banear (y/n)?" == y) { set %fjban 1 } echo 6 7tH ºp|-|Ω«Θ filtrando los usuarios en modo espera. }
n247= if ($2 == -s) { set %fchan # | set %fkserver $$?="Servidor para filtrar:" | .enable #fkjoin | if ($$?="Banear (y/n)?" == y) { set %fjban 1 } echo 6 7tH ºp|-|Ω«Θ filtrando servidor. }
n248= if ($2 == -r) { set %fchan # | set %fkircop 1 | .enable #fkjoin | if ($$?="Banear (y/n)?" == y) { set %fjban 1 } echo 6 7tH ºp|-|Ω«Θ filtrando IRCops. }
n249= if ($2 == -d) { set %fchan # | set %fkidle 1 | .enable #fkjoin | if ($$?="Banear (y/n)?" == y) { set %fjban 1 } echo 6 7tH ºp|-|Ω«Θ filtrando los usuarios en modo de paro. }
n250= if ($2 == -c) { set %fchan # | set %fkchans $$?="Canales, separados con un espacio:" | .enable #fkjoin | if ($$?="Banear (y/n)?" == y) { set %fjban 1 } echo 6 7tH ºp|-|Ω«Θ filtrando canales. }
n255= if ($1 == $null) { echo 4 -s Error, type: /ircopscan [-e|-c] | halt }
n256= if (# == $null) { set %window -s } | else { set %window # } | set %total 0 | write -c $mircdir $+ raw.txt
n257= if ($1 == -e) { echo 6 Esto escaneara toda la red y te dira todos los IRCops que estan actualmente. | set %total 0 | set %option 1 | write $mircdir $+ raw.txt /echo 4 %window :ì: Listando IRCops! :ì: | .enable #ircopscan | who 0 o }
n258= if ($1 == -c) {
n259= if (# == $null) { echo 4 -s Error, intenta escribir esto en la pantalla del canal. | halt }
n260= msg # 7tH ºp|-|Ω«Θ esta listando todos los IRCops que estan actualmente en la red..
n261= set %total 0 | set %option 2 | write $mircdir $+ raw.txt /msg # :ì: Listando IRCops! :ì: | .enable #ircopscan | who 0 o
